UC知道VB6.0中有无类似"this"的用于指代该控件的命令?
来源：百度知道 编辑：UC知道 时间：2024/05/29 01:30:45
比如我有一个commend(n)组(0<n),当我单击commend(m)时(0<=m<=n),text.text=commend(m).caption,如果n很大,难道我要写n条吗?有没有类似text.text=this.caption的东西?请教有没有什么好办法,谢谢.
获得焦点的对象可以用activecontrol,焦点窗体可以用activeform,本窗体可以用me
控件数组点击会有INDEX参数传入,下边这句就可以了
Private Sub Command1_Click(Index As Integer)
text.text = Command1(Index).Caption
End Sub
vb中是me